From 8e48508df40094817392ec90381bd5b407633ec7 Mon Sep 17 00:00:00 2001
From: robertl <robertl>
Date: Tue, 10 Feb 2004 14:33:06 +0000
Subject: [PATCH] Add gpx2xfig.

---
 contrib/gpx2xfig | 73 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 73 insertions(+)
 create mode 100644 contrib/gpx2xfig

diff --git a/contrib/gpx2xfig b/contrib/gpx2xfig
new file mode 100644
index 000000000..edd43cc22
--- /dev/null
+++ b/contrib/gpx2xfig
@@ -0,0 +1,73 @@
+From: David Slimp
+Date 02/09/04
+Subject: [Gpsbabel-misc] gpx2xfig and transparent gif
+
+Hello All,
+
+I don't know if anyone would be interested in this or not,
+but I've created a small perl script that will convert a gpx
+file to an xfig data file, so I could then take track
+information and edit in a visual way, and then using fig2dev
+I create a transparent gif of my track/route.
+
+I was planning to use this as an overlay for a Yahoo or
+MapQuest map, but after driving a couple miles and then
+trying to fit my track path over the Yahoo map for that area
+it seemed to be a bit off -- rotation wise. At first I
+thought it might be the difference between true north and
+magnetic north, but appearantly not.
+
+Anyway, in case anyone out there might benefit from this or
+want to work on it more here's my script and sample linux
+command lines:
+
+==================== gpx2xfig ===============================
+#!/usr/bin/perl -w
+#
+#   gpx2xfig - converts GPS gpx file to xfig vector file
+#
+#   author:  David Slimp <rock808@DavidSlimp.com>
+#   created: 20040206
+#   updated: 20040208
+
+$VERSION=".001";
+
+($infl,$outfl)=@ARGV;
+
+open(IN,"$infl")    or die "$!";
+open(OUT,">$outfl") or die "$!";
+
+while (<IN>) {
+        s/<trkpt lat="(.*?)" lon="(.*?)".*/$2 -$1/ and s/\.//g and push(@TrkPts,"$_");
+}
+close IN;
+
+
+print OUT       "#FIG 3.2\n",
+                "Landscape\n",
+                "Center\n",
+                "Inches\n",
+                "Letter  \n",
+                "100.00\n",
+                "Single\n",
+                "-2\n",
+                "1200 2\n",
+                "2 1 0 2 0 7 50 -1 -1 0.000 0 0 -1 0 0 ",scalar(@TrkPts),"\n";
+foreach (@TrkPts) {
+        print OUT ;
+}
+close OUT;
+=============================================================
+
+
+To convert the gpx file to xfig file:
+	$  ./gpx2xfig Tracks.gpx Tracks.xfig
+
+To create the transparent gif:
+	$  fig2dev -Lgif -t"#ffffff" -m.11 -b50 Tracks.xfig Tracks.gif
+
+(of course, you must have transfig package installed)
+
+
+
+
-- 
2.30.2